// .txt

beginzonescript;

variables;

short crime_tolerance = 2;
short last_abil;
short i;
short walk_timer = 0;

body;

beginstate INIT_STATE;

	set_name(8,"Elrica");
	set_name(9,"Caravan Guard");
	set_name(10,"Caravan Guard");
	set_name(11,"Caravan Guard");

	set_name(12,"Pack Fyora");
	set_name(13,"Pack Fyora");
	set_name(14,"Pack Fyora");
	set_level(12,20);
	set_level(13,20);
	set_level(14,20);
	
	set_name(15,"Captain Kellen");
	set_level(15,25);
	set_boss_level(15,2);
	set_new_abil(15,20);
	
	sf(21,8,0);
	sf(21,9,0);
	
	activate_hidden_group(1);
	add_range_to_group(16,18,1);
	add_range_to_group(19,22,2);
	add_range_to_group(23,27,3);
	add_range_to_group(28,29,4);

	set_boss_level(30,1);
	set_boss_level(31,1);
	set_boss_level(32,1);
	set_boss_level(33,1);

	set_name(40,"Shaper Roman");
	set_name(44,"Shaper Niko");
	set_boss_level(40,2);
	set_boss_level(44,2);


	add_range_to_group(50,54,5);
	set_name(50,"Shresss");
	set_level(50,17);
	set_boss_level(50,1);
	
	set_aggression(55,8);
	set_aggression(56,8);
	set_aggression(57,8);
	set_aggression(58,8);
	set_aggression(59,8);
	set_aggression(60,8);
	
	if (get_sdf(21,1) > 0) {
		make_zone_hostile();
		}

	last_abil = get_current_tick();
	
	set_crime_tolerance(crime_tolerance);
	break;

beginstate EXIT_STATE;

break;

beginstate START_STATE;
	// clear zone?
	//if ((zone_clear(ME) == FALSE) && (get_flag(,) > 0)) {
		//print_str_color("",2);
		//clear_zone(ME);	
		//}
		
	if ((get_crime_level() >= crime_tolerance) && (get_sdf(21,1) == 0)) {
		make_zone_hostile();
		set_flag(21,1,1);
		}

	 if (gf(21,1) == 0) {
		if (get_ran(1,0,100) < 10)
			give_char_text_bubble(8,"Who else do I know?");
		if (get_ran(1,0,100) < 10)
			give_char_text_bubble(8,"Who has influence?");
		if (get_ran(1,0,100) < 10)
			give_char_text_bubble(8,"Curse that Kellen!");
		if (get_ran(1,0,100) < 10)
			give_char_text_bubble(8,"Where's my pen?");
		if (get_ran(1,0,100) < 10)
			give_char_text_bubble(9 + get_ran(1,0,2),"Never getting away.");
		if (get_ran(1,0,100) < 10)
			give_char_text_bubble(9 + get_ran(1,0,2),"Hate this pass.");
		if (get_ran(1,0,100) < 10)
			give_char_text_bubble(9 + get_ran(1,0,2),"Can we go yet?");
		if (get_ran(1,0,100) < 10)
			give_char_text_bubble(15,"Time to leave.");
		if (get_ran(1,0,100) < 10)
			give_char_text_bubble(15,"None of your tricks.");
		if (get_ran(1,0,100) < 10)
			give_char_text_bubble(15,"No papers, no pass.");
		}
	
	if (((is_combat()) && (tick_difference(last_abil,get_current_tick()) > 0)) || ((is_group()) && (tick_difference(last_abil,get_current_tick()) > 3))) {
		last_abil = get_current_tick();

		walk_timer = walk_timer + 1;
		if (walk_timer >= 4) {
			walk_timer = 0;
			if (gf(21,7) == 0)
				sf(21,7,1);
				else sf(21,7,0);
			}

		if ((gf(21,11) > 0) && (gf(21,11) < 10))
			inc_flag(21,11,1);
		}
		
	if (gf(21,8) > 0) {
		if (char_ok(34) == FALSE) {
			spawn_creature(26);
			if (gf(21,12) < 8)
				set_boss_level(34,1);
				else {
					set_summon_level(34,1);
					set_boss_level(34,2);
					}
			}
		if (char_ok(35) == FALSE) {
			spawn_creature(27);
			if (gf(21,12) < 8)
				set_boss_level(35,1);
				else {
					set_summon_level(35,1);
					set_boss_level(35,2);
					}
			}
		if (char_ok(36) == FALSE) {
			spawn_creature(28);
			if (gf(21,12) < 8)
				set_boss_level(36,1);
				else {
					set_summon_level(36,1);
					set_boss_level(36,2);
					}
			}
		if (char_ok(37) == FALSE) {
			spawn_creature(29);
			if (gf(21,12) < 8)
				set_boss_level(37,1);
				else {
					set_summon_level(37,1);
					set_boss_level(37,2);
					}
			}
		if (char_ok(38) == FALSE) {
			spawn_creature(30);
			if (gf(21,12) < 8)
				set_boss_level(38,1);
				else {
					set_summon_level(38,1);
					set_boss_level(38,2);
					}
			}
		if (char_ok(39) == FALSE) {
			spawn_creature(31);
			if (gf(21,12) < 8)
				set_boss_level(39,1);
				else {
					set_summon_level(39,1);
					set_boss_level(39,2);
					}
			}
		}
break;

//beginstate 10;
//break;

//	print_str("");
//	set_terrain_string_range(".",3);
//	set_terrain_string_range("The sign says - .",3);
